This command will return the name string of the specified limb.

Return String=LIMB NAME$(Object Number, Limb Number)

Object Number

Integer
The object number

Limb Number

Integer
The limb number

This command will return the name string of the specified limb

You can also get the limb name by running a checklist on an object, however this interrogates an individual limb number for its actual name within the object.

sync on : sync rate 60 : hide mouse:cls 0

ObjectNumber=1

LimbNumber=7

load object "model.x",ObjectNumber

load image "iron.jpg",1

perform checklist for object limbs ObjectNumber

for c=1 to checklist quantity()

print checklist string$(c)

next c

while mouseclick()=0

set cursor 0,0

print "the limb x scale is ",limb scale x(ObjectNumber,LimbNumber)

print "the limb y scale is ",limb scale y(ObjectNumber,LimbNumber)

print "the limb z scale is ",limb scale z(ObjectNumber,LimbNumber)

print "limb name ",LIMB NAME$(ObjectNumber,LimbNumber)

print

print "please press a number"

print "1=hide limb":if inkey$()="1" then hide limb ObjectNumber,LimbNumber

print "2=show limb":if inkey$()="2" then show limb ObjectNumber,LimbNumber

print "3=offset limb":if inkey$()="3" then offset limb ObjectNumber,LimbNumber,0, 0,5

print "4=rotate limb":if inkey$()="4" then rotate limb ObjectNumber,LimbNumber,0,wrapvalue(limb angle y(ObjectNumber,LimbNumber)+1),0

print "5=scale limb":if inkey$()="5" then scale limb ObjectNumber,LimbNumber,200,200,200

print "6=color limb":if inkey$()="6" then color limb ObjectNumber,LimbNumber,rgb(0,255,0)

print "7=texture limb":if inkey$()="7" then texture limb ObjectNumber,LimbNumber,1

print "8=scroll limb texture":if inkey$()="8" then scroll limb texture ObjectNumber,LimbNumber,0.5,0.5

print "9=scale limb texture":if inkey$()="9" then scale limb texture ObjectNumber,LimbNumber,0.5,0.5

sync

endwhile

set global collision off `Deactivate global collision

delete object ObjectNumber

delete image 1

end

BASIC3D Commands Menu
Index